home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 63 / Tiger_Disk_063_19xx_Tiger-Crew-Disk_de_Side_B.d64 / freie blks. [td] (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  116b  |  4 lines
  1. 10 open1,8,15,"i":print#1,"m-r"chr$(250)chr$(2)chr$(3)
  2. 20 get#1,a$,b$,b$:x=asc(a$+chr$(0))+256*asc(b$+chr$(0)):close1
  3. 30 print"[147]"x"blocks frei!"
  4.